1 POKE53280,14:POKE53281,6:FORI=50000TO50022:READA:POKEI,A:NEXT
5 A$="T":B=13:D=4:W=129
6 PRINTCHR$(147):PRINT:PRINT:PRINT"[154]  [198]URZEDITOR"SPC(7)"('93 CRACK BY ATZE)"
10 PRINTCHR$(14)CHR$(8):PRINT:PRINT"  [193]NZAHL DER '[194]LUBBE'(1-23)?"B
11 PRINT CHR$(145)TAB(27);:INPUT B
13 PRINT:PRINT:PRINT"  [198]URZDAUER?"D:PRINTCHR$(145)TAB(11);:INPUT D
14 PRINT:PRINT:PRINT"  [198]EUCHT ODER [212]ROCKEN? "A$CHR$(157)CHR$(157)CHR$(157);
15 INPUTA$:W=129
16 IFA$="F"THENW=17
17 PRINT:PRINT:PRINT"  ([218]) =>[218]UFALLSFURZ"
18 PRINT:PRINT:PRINT"  (N) =>[198]URZ NEU KREIEREN"
19 PRINT:PRINT:PRINT"  (*) =>[206]OCHMAL FURZEN"
20 FORI=0TO24:POKE54272+I,0:NEXT
30 SD=54272+14:POKESD+10,15:POKESD+6,240:POKESD+4,W
40 FORI=0TOB:POKE2,(7-I)*5+85:SYS50000:FORK=1TOI*D:NEXT:NEXT
60 GETG$:IFG$=""THEN60
71 A$="T":IFW=17THENA$="F"
72 PRINTCHR$(19):FORI=1TO5:PRINT:NEXT:PRINTSPC(27)"?"B CHR$(157)"  "
73 PRINT:PRINT:PRINT"  [198]URZDAUER?"DCHR$(157)"  "
74 PRINT:PRINT:PRINT"  [198]EUCHT ODER [212]ROCKEN? "A$
75 IFG$="N"THENGOTO6
76 GOTO30
80 DATA120,162,0,160,15,136,208,253,232,142,15,212,228,2,208,243,169,0
90 DATA141,15,212,88,96